object FrmPaketOlustur: TFrmPaketOlustur
  Tag = 234
  Left = 7
  Top = 61
  Width = 1001
  Height = 673
  Caption = 'Paket Etiketi Olu'#351'tur'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  Menu = MainMenu2
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object duzeltyetkisik: TPanel
    Tag = 1002
    Left = 312
    Top = 191
    Width = 54
    Height = 27
    BevelOuter = bvNone
    TabOrder = 9
  end
  object Panel1: TPanel
    Left = 9
    Top = 184
    Width = 493
    Height = 41
    BevelOuter = bvNone
    BevelWidth = 2
    Font.Charset = TURKISH_CHARSET
    Font.Color = clMaroon
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 231
    Width = 497
    Height = 328
    Color = 14811135
    DataSource = DSGridData
    Font.Charset = TURKISH_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 1
    TitleFont.Charset = TURKISH_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Arial'
    TitleFont.Style = [fsBold]
    Columns = <
      item
        Expanded = False
        FieldName = 'SeriNo'
        Title.Caption = 'Seri No'
        Width = 127
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Stokkodu'
        Width = 116
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'cinsi'
        Title.Caption = 'Cinsi'
        Width = 235
        Visible = True
      end>
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 0
    Width = 497
    Height = 104
    TabOrder = 2
    object Label5: TLabel
      Left = 171
      Top = 27
      Width = 55
      Height = 16
      AutoSize = False
      Caption = 'Stok Kodu'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label6: TLabel
      Left = 16
      Top = 27
      Width = 55
      Height = 16
      AutoSize = False
      Caption = #220'retim No'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label7: TLabel
      Left = 16
      Top = 51
      Width = 31
      Height = 16
      AutoSize = False
      Caption = 'Tarih'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label8: TLabel
      Left = 171
      Top = 51
      Width = 31
      Height = 16
      AutoSize = False
      Caption = 'Cinsi'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label17: TLabel
      Left = 16
      Top = 76
      Width = 57
      Height = 16
      AutoSize = False
      Caption = 'A'#231#305'klama'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object edStokkodu: TEdit
      Tag = 1
      Left = 237
      Top = 19
      Width = 185
      Height = 22
      TabStop = False
      Color = 14811135
      Font.Charset = TURKISH_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      OnKeyPress = Sonraki
    end
    object edUretimno: TEdit
      Left = 72
      Top = 19
      Width = 78
      Height = 22
      TabStop = False
      Color = 14811135
      Font.Charset = TURKISH_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
    end
    object edcinsi: TEdit
      Tag = 2
      Left = 237
      Top = 44
      Width = 246
      Height = 22
      TabStop = False
      Color = 14811135
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
      OnKeyPress = Sonraki
    end
    object edTarih: TwwDBDateTimePicker
      Left = 72
      Top = 44
      Width = 79
      Height = 22
      TabStop = False
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Color = 14811135
      Epoch = 1950
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      ShowButton = True
      TabOrder = 1
      OnKeyPress = Sonraki
    end
    object ack: TEdit
      Tag = 2
      Left = 72
      Top = 72
      Width = 411
      Height = 22
      TabStop = False
      Color = 14811135
      Font.Charset = TURKISH_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
      OnKeyPress = Sonraki
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 104
    Width = 497
    Height = 76
    TabOrder = 3
    object Label9: TLabel
      Left = 16
      Top = 44
      Width = 57
      Height = 16
      AutoSize = False
      Caption = 'Paket No'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label3: TLabel
      Left = 263
      Top = 20
      Width = 71
      Height = 16
      AutoSize = False
      Caption = 'Personel Kodu'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label2: TLabel
      Left = 263
      Top = 44
      Width = 71
      Height = 16
      AutoSize = False
      Caption = 'Personel Ad'#305
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label1: TLabel
      Left = 16
      Top = 21
      Width = 57
      Height = 16
      AutoSize = False
      Caption = 'Seri No'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object edSeriNo: TEdit
      Left = 72
      Top = 18
      Width = 153
      Height = 21
      CharCase = ecUpperCase
      TabOrder = 0
      OnKeyPress = edSeriNoKeyPress
    end
    object EdPerAdi: TwwDBLookupCombo
      Left = 336
      Top = 42
      Width = 155
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'AdSoyad'#9'30'#9'AdSoyad'#9'F')
      DataField = 'perkod'
      DataSource = DsPersonel
      LookupTable = adoPerkart
      LookupField = 'perkod'
      Options = [loColLines, loTitles]
      Color = 14811135
      Navigator = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
      AutoDropDown = True
      ShowButton = False
      UseTFields = False
      AllowClearKey = False
      ShowMatchText = True
      OnKeyPress = Sonraki
    end
    object wwDBLookupCombo1: TwwDBLookupCombo
      Left = 336
      Top = 18
      Width = 105
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'PersonelNo'#9'4'#9'PersonelNo'#9'F')
      DataField = 'perkod'
      DataSource = DsPersonel
      LookupTable = adoPerkart
      LookupField = 'perkod'
      Options = [loColLines, loTitles]
      Color = 14811135
      Navigator = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      AutoDropDown = True
      ShowButton = False
      UseTFields = False
      AllowClearKey = False
      ShowMatchText = True
      OnKeyPress = Sonraki
    end
    object edPaketSeri: TEdit
      Left = 72
      Top = 41
      Width = 153
      Height = 21
      MaxLength = 11
      ReadOnly = True
      TabOrder = 3
    end
  end
  object BitBtn1: TBitBtn
    Left = 439
    Top = 565
    Width = 63
    Height = 31
    Caption = 'Kapat'
    Font.Charset = TURKISH_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    OnClick = BitBtn1Click
  end
  object fcButtonGroup1: TfcButtonGroup
    Left = 8
    Top = 566
    Width = 354
    Height = 33
    AutoBold = True
    BevelOuter = bvNone
    BorderStyle = bsSingle
    ButtonClassName = 'TfcShapeBtn'
    ClickStyle = bcsRadioGroup
    ControlSpacing = 1
    Columns = 1
    Font.Charset = TURKISH_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Layout = loHorizontal
    MaxControlSize = 0
    TabOrder = 5
    Transparent = False
    OnChange = fcButtonGroup1Change
    object fcButtonGroup1fcShapeBtn1: TfcShapeBtn
      Tag = 1
      Left = 0
      Top = 0
      Width = 87
      Height = 29
      Caption = 'Yeni (F4)'
      Color = clBtnFace
      DitherColor = clWhite
      Down = True
      Font.Charset = TURKISH_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      GroupIndex = 1
      NumGlyphs = 0
      ParentClipping = True
      ParentFont = False
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      TabOrder = 0
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
    end
    object fcButtonGroup1fcShapeBtn2: TfcShapeBtn
      Tag = 2
      Left = 88
      Top = 0
      Width = 87
      Height = 29
      Caption = 'Devam (F7)'
      Color = clBtnFace
      DitherColor = clWhite
      Font.Charset = TURKISH_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      GroupIndex = 1
      ParentClipping = True
      ParentFont = False
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      TabOrder = 1
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
    end
    object fcButtonGroup1fcShapeBtn3: TfcShapeBtn
      Tag = 3
      Left = 176
      Top = 0
      Width = 87
      Height = 29
      Caption = #199#305'kart (F6)'
      Color = clBtnFace
      DitherColor = clWhite
      Font.Charset = TURKISH_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      GroupIndex = 1
      ParentClipping = True
      ParentFont = False
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      TabOrder = 2
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
    end
    object fcButtonGroup1fcShapeBtn4: TfcShapeBtn
      Tag = 4
      Left = 264
      Top = 0
      Width = 86
      Height = 29
      Caption = 'Par'#231'ala (F8)'
      Color = clBtnFace
      DitherColor = clWhite
      Font.Charset = TURKISH_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      GroupIndex = 1
      ParentClipping = True
      ParentFont = False
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      TabOrder = 3
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 608
    Width = 993
    Height = 19
    Panels = <>
  end
  object GroupBox5: TGroupBox
    Left = 514
    Top = 0
    Width = 479
    Height = 608
    Align = alRight
    Caption = #220'retim Emirleri'
    TabOrder = 6
    object Label18: TLabel
      Left = 10
      Top = 25
      Width = 35
      Height = 14
      Caption = #304'lk Tarih'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label19: TLabel
      Left = 10
      Top = 49
      Width = 45
      Height = 14
      Caption = 'Son Tarih'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object wwDBGrid1: TwwDBGrid
      Left = 2
      Top = 95
      Width = 475
      Height = 186
      DisableThemes = False
      Selected.Strings = (
        'emirno'#9'6'#9'Emir No'#9#9
        'stokkodu'#9'15'#9'Stok Kodu'#9#9
        'miktar'#9'6'#9'Miktar'#9#9
        'tarih'#9'8'#9'Tarih'#9'F'#9
        'aciklama'#9'50'#9'A'#231#305'klama'#9#9)
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alBottom
      Color = 14811135
      DataSource = emirliS
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      KeyOptions = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgCancelOnExit, dgWordWrap]
      ParentFont = False
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = TURKISH_CHARSET
      TitleFont.Color = clBlack
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      TitleLines = 1
      TitleButtons = True
      UseTFields = False
      OnDblClick = wwDBGrid1DblClick
      object wwDBGrid1IButton: TwwIButton
        Left = 0
        Top = 0
        Width = 13
        Height = 22
        AllowAllUp = True
        Caption = 'X'
      end
    end
    object wwDBGrid2: TwwDBGrid
      Left = 2
      Top = 281
      Width = 475
      Height = 325
      DisableThemes = False
      Selected.Strings = (
        'stokkodu'#9'41'#9'Stok Kodu'#9#9
        'miktar'#9'7'#9'Miktar'#9#9
        'yapilan'#9'10'#9'Yap'#305'lan'#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alBottom
      Color = 14811135
      DataSource = dsemirlishar
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      KeyOptions = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgCancelOnExit, dgWordWrap]
      ParentFont = False
      TabOrder = 1
      TitleAlignment = taLeftJustify
      TitleFont.Charset = TURKISH_CHARSET
      TitleFont.Color = clBlack
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      TitleLines = 1
      TitleButtons = True
      UseTFields = False
      OnCalcCellColors = wwDBGrid2CalcCellColors
      object wwDBGrid2IButton: TwwIButton
        Left = 0
        Top = 0
        Width = 13
        Height = 22
        AllowAllUp = True
        Caption = 'X'
      end
    end
    object t1: TwwDBDateTimePicker
      Left = 61
      Top = 21
      Width = 85
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 2
      DisplayFormat = 'dd-mm-yyyy'
    end
    object t2: TwwDBDateTimePicker
      Left = 61
      Top = 45
      Width = 85
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 3
      DisplayFormat = 'dd-mm-yyyy'
    end
    object blistele: TBitBtn
      Left = 153
      Top = 22
      Width = 79
      Height = 41
      Caption = 'Listele'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 4
      OnClick = blisteleClick
    end
  end
  object bbitir: TBitBtn
    Left = 364
    Top = 566
    Width = 71
    Height = 30
    Caption = 'B'#304'T'#304'R - F2'
    Font.Charset = TURKISH_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 7
    OnClick = bbitirClick
  end
  object emirli: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'ciktidepo'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end
      item
        Name = 't1'
        Attributes = [paNullable]
        DataType = ftDateTime
        Precision = 16
        Size = 16
        Value = Null
      end
      item
        Name = 't2'
        Attributes = [paNullable]
        DataType = ftDateTime
        Precision = 16
        Size = 16
        Value = Null
      end>
    SQL.Strings = (
      'select * from Uremri'
      'Where  ciktidepo=:ciktidepo and tarih between :t1 and :t2 '
      'and substring(stokkodu,1,2)='#39'Z.'#39' '
      'order by emirno')
    Left = 796
    Top = 16
  end
  object emirlishar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    DataSource = emirliS
    Parameters = <
      item
        Name = 'emirno'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = 19195
      end>
    SQL.Strings = (
      'select * from uremrihar'
      
        'Where (select top 1 izlemeturu from stok where stok.stokkod=urem' +
        'rihar.stokkod)=2 and emirno=:emirno'
      'order by urunck')
    Left = 580
    Top = 312
  end
  object emirliS: TDataSource
    DataSet = emirli
    Left = 852
    Top = 16
  end
  object dsemirlishar: TDataSource
    DataSet = emirlishar
    Left = 652
    Top = 312
  end
  object yazici: TRAWPrinter
    TrControl = True
    Left = 254
    Top = 456
  end
  object ServerTarihQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'serinos'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'SELECT GETDATE()')
    Left = 904
    Top = 16
  end
  object rprn1: TRAWPrinter
    PrinterName = 'paketyazici'
    DocumentTitle = 'paketEtiketi'
    TrControl = True
    Left = 256
    Top = 512
  end
  object adoPakKontrol: TADOQuery
    Connection = dm.connect
    Parameters = <
      item
        Name = 'Seri'
        Size = -1
        Value = Null
      end>
    SQL.Strings = (
      'Select pakserino,Stokkod Fatharhar where serinos=:Seri')
    Left = 320
    Top = 280
  end
  object spParcaEkleSilPaket: TADOStoredProc
    Connection = dm.connect
    ProcedureName = 'sp_ParcaEkleSilPaket;1'
    Parameters = <>
    Left = 752
    Top = 312
  end
  object adoStokBul: TADOQuery
    Connection = dm.connect
    Parameters = <
      item
        Name = 'SKodu'
        DataType = ftString
        Size = -1
        Value = Null
      end>
    SQL.Strings = (
      'Select * From Stok where Stokkodu=:SKodu')
    Left = 401
    Top = 280
  end
  object adoSeriNoKontrol: TADOQuery
    Connection = dm.connect
    Parameters = <
      item
        Name = 'Seri'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'Select F.*,S.Stokkodu,S.cinsi '
      'From Fatharhar F Join Stok S on S.stokkod=F.Stokkod '
      'where serinos=:Seri '
      
        'and (select anagrupkod from stgrup where grkod=(Select grup from' +
        ' stok where stokkod = F.Stokkod ))  = '#39'Z'#39
      '')
    Left = 401
    Top = 336
  end
  object adoGridData: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'Seri'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 11
        Value = Null
      end>
    SQL.Strings = (
      'Select  F.serinos As SeriNo , s.Stokkodu, S.cinsi,S.stokkod '
      'from  Fatharhar F join Stok S on F.stokkod=S.Stokkod '
      'where F.pakserino=:Seri and  makinano is null'
      '')
    Left = 232
    Top = 280
  end
  object DSGridData: TDataSource
    DataSet = adoGridData
    Left = 232
    Top = 336
  end
  object adoTemp: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 160
    Top = 280
  end
  object adoEmirHar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'Emir'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end
      item
        Name = 'stokkod'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'select * from uremrihar where emirno=:Emir and Stokkod=:stokkod')
    Left = 160
    Top = 336
  end
  object adoPersonel: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      ''
      'select * from perkart')
    Left = 160
    Top = 400
  end
  object DsPersonel: TDataSource
    DataSet = adoPersonel
    Left = 160
    Top = 456
  end
  object adoPerkart: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select Perkod,PersonelNo, Adi + '#39' '#39' + Soyadi As AdSoyad from per' +
        'kart')
    Left = 96
    Top = 400
  end
  object DsPerkart: TDataSource
    DataSet = adoPerkart
    Left = 96
    Top = 456
  end
  object MainMenu2: TMainMenu
    Left = 456
    Top = 14
    object MenuItem1: TMenuItem
      Caption = 'Dosya'
      object MenuItem2: TMenuItem
        Caption = 'Yeni'
        ShortCut = 115
        OnClick = MenuItem2Click
      end
      object MenuItem3: TMenuItem
        Caption = 'Devam'
        ShortCut = 118
        OnClick = MenuItem3Click
      end
      object MenuItem4: TMenuItem
        Caption = #199#305'kart'
        ShortCut = 117
        OnClick = MenuItem4Click
      end
      object MenuItem5: TMenuItem
        Caption = 'Par'#231'ala'
        ShortCut = 119
        OnClick = MenuItem5Click
      end
      object MenuItem6: TMenuItem
        Caption = 'Bitir'
        ShortCut = 113
        OnClick = MenuItem6Click
      end
      object MenuItem7: TMenuItem
        Caption = 'Yazd'#305'r'
        ShortCut = 120
        OnClick = Yazdr1Click
      end
    end
  end
end
